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PREFACE 


The  purpose  of  IDA  Memorandum  Report  M-316,  “Final  Report  -  WIS  Ada 
Translator  Testing",  is  to  forward  data  developed  in  the  course  of 
performing  acceptance  testing  on  the  FORTRAN  and  COBOL  to  Ada 
translators  constructed  for  the  World  Wide  Military  Command  and 
Control  Information  System  Joint  Program  Management  Office  (WIS  JPMO) . 

The  importance  of  this  document  is  based  on  fulfilling  the  objective 
of  Task  Order  T-W5-260,  WIS  Ada  Translator,  which  is  to  test  and 
document  the  acceptance  of  the  translators.  M-316  will  be  used  to 
provide  evidence  of  the  effort  in  confirming  the  functionality  of  the 
translators  delivered.  As  a  Memorandum  Report,  M-316  is  directed 
towards  the  potential  users  of  the  translators. 

The  preliminary  document  was  reviewed  in  September  1986  and  the  final 
document  was  revived  in  January  1987  by  Dr.  John  F.  Kramer  and  Dr. 
John  Salasin.  An  external  review  was  also  performed  by  Lt.  Col. 
Terry  Courtwright  and  Capt .  Jacques  Choiniere,  WIS  JPMO. 
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Pinal  Report  -  VIS  Ada*  Translator  Testing 
Task  T-W5-260 


Robert  J.  Snapper 
Institute  for  Defense  Analyses 
Computer  and  Software  Engineering  Division 
1801  N.  Beauregard  Street 
Alexandria,  VA  22311 


1.0  ABSTRACT 


The  Worldwide  Military  Command  and  Control  System  (WWMCCS)  has  as 
a  component  the  data  collection  and  processing  facilities  of  our 
defense  system.  This  component,  WMCCS  ADP,  was  installed  by 
Honeywell  Information  Systems  starting  in  1971.  The  application 
software  for  the  H6000  machines  was  written  in  FORTRAN  66  and  COBOL 
68.  In  the  past  15  years,  that  software  has  been  patched  and  updated, 
with  new  modules  in  different  FORTRAN  and  COBOL  dialects  added. 

A  modernization  of  WMCCS  ADP  to  the  WMCCS  Information  System 
(WIS)  was  started  in  1982.  The  software  for  WIS,  unlike  that  for 
WMCCS  ADP,  is  intended  to  be  independent  of  the  hardware  on  which  it 
is  to  run.  The  use  of  MIL-STD-1815A  Ada  will  support  the  construction 
of  machine  independent  software. 

To  assist  in  bringing  WIS  on-line  faster  and  to  help  defer  the 
costs  in  developing  new  WIS  software  in  Ada,  automated  tools  to 
translate  existing  WMCCS  ADP  software  from  the  original  FORTRAN  and 
COBOL  to  Ada  have  been  constructed. 


2.0  INTRODUCTION 


The  major  objective  in  the  WMCCS  translator  project  is  to 
develop  a  set  of  production  quality  translation  tools.  These  tools 
are  to  provide  100  percent  automated  translation  into  MIL-STD-1815A 
Ada  of  the  legal,  standard  features  of  one  dialect  each  of  FORTRAN  66 
and  COBOL  68  common  to  WMCCS  ADP  software.  Ada  is  the  language  to  be 
used  in  constructing  WIS  to  enhance  software  component  portability  and 
to  increase  machine  independence.  By  reusing  WWMCCS  ADP  software 
through  translation  to  Ada,  the  costs  to  redesign  and  reengineer 
portions  of  the  Joint  mission  software  will  be  defered.  This  will 
allow  an  integrated,  functioning  WIS  that  is  machine  independent  to  be 
brought  on-line  and  into  use  faster.  Eventually,  all  of  the  WWMCCS 
ADP  software  will  be  redesigned  and  recoded  into  Ada,  but  the  use  of 
the  interim  capability  through  source  translation  in  order  to  defer 
costs  is  desirable.  The  need  for  defering  costs  is  based  on  the  fact 
that  WWMCCS  ADP  joint  software  may  be  as  large  as  20  millions  lines  of 
code.  All  of  this  code  cannot  be  redesigned  immediately, 
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3.0  BACKGROUND 


WWMCCS  consists  of  five  major  elements:  communication  systems, 
early  warning  systems,  command  facilities,  executive  aids,  and  data 
collection  and  processing.  Tie  data  collection  and  processing 
element,  WWMCCS  ADP,  provides  the  information  processing  support 
needed  by  military  planners  and  operators  in  planning  military 
operations,  monitoring  plan  execution,  and  replanning  in  response  to 
changing  military  situations . 

WWMCCS  ADP  hardware  and  system  software  was  installed  by 
Honeywell  Information  Systems  starting  in  1971.  In  the  past  15  years, 
the  initial  installation  of  H6000  hardware  and  GCOS  III  operating 
systems  for  WWMCCS  ADP  has  grown  to  include  over  100  CPUs  in  34 
different  locations.  Large  volumes  of  both  joint  mission  software  and 
command  unique  software  are  executed  at  each  location. 

The  evolution  of  WWMCCS  ADP  applications  around  the  Honeywell 
H6000  and  GCOS  III  base  has  led  to  a  severe  dependence  on  out-dated 
equipment  resulting  in  software  that  is  difficult  to  upgrade  and 
maintain.  Recognizing  this  dependence,  a  plan  to  modernize  WWMCCS  ADP 
into  WIS  was  approved  in  1982.  The  approach  to  be  taken  in  the 
modernization  includes  the  key  concept  that  applications  software  can 
be  developed  that  is  independent  of  a  particular  hardware  and  or 
environment.  Therefore,  development,  testing,  and  implementation  of 
Joint  mission  software  modules  can  be  done  without  the  need  to  depend 
upon  future  joint  mission  hardware  acquisitions.  The  use  of  Ada,  as  a 
closely  controlled  military,  national,  and  international  standard,  for 
the  design  and  software  engineering  of  WIS  will  support  the  goal  of 
machine  independence  for  WIS  software. 

Some  of  the  capabilities  in  WWMCCS  ADP  software  will  continue  to 
be  required  in  WIS.  The  redesign  and  reengineering  of  these 
capabilities  is  an  eventuality,  however  an  interim  reengineering 
through  the  use  of  source  to  source  translation  will  not  only  assist 
in  bringing  WIS  on-line  faster,  but  will  also  defer  the  complete 
reengineering  costs  and  will  expedite  the  use  of  Ada  in  WIS. 

The  WIS  modernization  effort  is  under  the  management  control  of 
the  WIS  Joint  Program  Management  Office  (JPMO).  In  support  of  the  WIS 
JPMO,  the  Institute  for  Defense  Analyses  (IDA)  has  been  tasked  to 
provide  a  set  of  translation  tools.  IDA,  through  a  subcontract  to 
Advanced  Technology  Systems  (ATS),  began  work  on  the  tool  set  in 
January  1985  and  delivered  the  final  products  in  November  1986. 


4.0  TRANSLATION  TOOLS 


The  FORTRAN  and  COBOL  translators  are  actually  a  collection  of 
five  translation  tools: 

a.  FORTRAN  Source  Analyzer  -  analyzes  WWMCCS  ADP  FORTRAN  source 
and  creates  an  Attributed  Abstract  Syntax  Tree  ( AAST) . 
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b.  FORTRAN  Tree  Transformer  -  transforms  the  FORTRAN  AAST  into 
Descriptive  Intermediate  Attributed  Notation  for  Ada  (DIANA) . 

o.  COBOL  Source  Analyzer  -  analyzes  WVMCCS  ADP  COBOL  source  and 
creates  an  AAST. 

d.  COBOL  Tree  Transformer  -  transforms  the  COBOL  AAST  into 
DIANA. 

e.  DIANA  Converter  -  creates  Ada  teztual  representations  from 
the  DIANA  form.  Also  provides  minimal  aesthetic  formatting. 


These  components  are  supported  by  FORTRAN  and  COBOL  pattern 
tables  and  by  run-time  support  packages  to  be  used  by  the  translated 
code  during  compilation  and  execution. 


4.1  Design  Approach 


The  approach  taken  for  the  translator  construction  is  based  on 
current  compiler  construction  technology;  a  front-end  source  analyzer 
producing  an  abstract  syntax  tree,  a  middle-end  to  walk  the  tree  and 
generate  an  intemediate  langauge,  and  finally  a  back-end  code 
generator.  The  tree  is  produced  by  the  analyzers  are  extended  by 
using  mappings  of  the  source  language  as  patterns.  The  resulting  tree 
is  a  DIANA  tree  representing  the  equivalent  Ada  program. 


5.0  ACCEPTANCE  TESTING 


The  testing  of  the  translation  tools  was  a  three  phase  process. 
First ,  the  individual  prototypes  were  tested  for  functionality  and 
completeness  of  the  features  specified  for  that  prototype.  Second, 
the  overall  conformity  of  the  final  prototypes  was  checked  with 
compiler  test  suites,  and  lastly,  the  final  prototypes  were  required 
to  successfully  translate  live  WMCCS  ADP  software  using  generated  or 
declassified,  live  data. 


5.1  Prototype  Functionality 


The  functionality  of  each  prototype  was  checked  by  exercising 
each  of  the  features  and  combination  of  features  to  be  supported  by 
that  prototype.  ATS  provided  an  on-line  set  of  tests  that  were  used 
to  check  prototype  features.  IDA  used  this  set  plus  modified  and 
added  to  the  set  to  check  for  prototype  functionality.  Since 
succeeding  prototypes  are  built  upon  previous  ones,  a  particular 
prototype  must  pass  not  only  the  new  tests  but  any  previous  test  also. 
There  is  no  contingent  passing  of  the  tests.  The  prototype  must 
function  fully  as  specified  or  it  is  not  accepted. 


All  of  the  11  Prototypes  (5  FORTRAN  and  6  COBOL,  see  Appendiz  A) 
passed  these  tests  at  the  level  specified.  The  tests  used  to  validate 
the  last  two  delivered  prototypes,  PIO-FORTRAN  and  Pll-COBOL  are 
included  with  the  translator  source  and  documentation  set .  They 
incorporate  all  of  the  previous  features  required  by  the  translator. 

5.2  Conformity  Testing 


The  General  Services  Administration  Software  Testing  Center 
maintains  test  suites  for  FORTRAN  and  COBOL  compiler  testing.  These 
tests  allow  conformity  to  the  FORTRAN  66  and  COBOL  68  standards  to  be 
checked.  The  suites  contain  syntactically  and  semantically  correct 
programs  that  are  self-supporting.  They  generate  their  own  data  and 
produce  a  report  file  when  compiled  and  ezecuted.  Properly  ezecuting 
programs  so  indicate  in  the  report .  These  programs  were  translated 
into  Ada  with  the  tools  then  compiled  and  ezecuted.  The  results 
generated  by  the  translated  versions  are  compared  with  the  original 
versions  electronically  ezcept  where  noted  in  the  testing  record 
(Appendizes  B  and  C). 


5.2.1  COBOL  Test  Suite 


The  COBOL  test  suite  consists  of  319  test  programs  in  12  modules: 

—  Communication 

—  Debug 

—  Inter-Program  Communication 

—  Indezed  I/O 

—  Library 

—  Nucleus 

—  Relative  I/O 

—  Report  Writer 

—  Segmentation 

—  Sequential  I/O 

—  Sort-Merge 

—  Table  Handling 


Of  the  319  programs,  193  were  applicable  to  the  particular 
dialect  of  COBOL  used  as  the  source  for  the  translation.  Most  of  the 
remaining  126  tests  come  from  the  Debug  module,  the  Report  Writer 
module,  and  from  I/O  features  that  are  not  supported  by  the 
translator.  Two  of  the  193  tests  were  modified  to  remove  an  optional 
feature  of  COBOL  that  the  translator  does  not  support.  The  193 
programs  contained  nearly  30,000  lines  of  COBOL  source  and  thoroughly 
ezercised  the  capability  of  the  translator  to  recognize  and  correctly 
translate  COBOL  syntaz  for  the  dialect  used.  The  translator  passed 
these  tests  (see  Appendiz  B). 

> 
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5.2.2  FORTRAN  Test  Suite 


The  FORTRAN  test  suite  contains  193  test  programs  in  3  categories 

—  Subset  1 

—  Subset  2 

—  Full  Language 


Of  the  193  programs,  105  were  applicable  to  the  particular 
dialect  of  FORTRAN  used  as  the  source  for  the  translation.  Host  of 
the  88  tests  not  applicable  come  from  the  Full  Language  category.  The 
sophisticated  and  intricate  interfaces  and  interactions  between 
features  and  program  semantics  are  not  handled  by  this  particular 
dialect.  Of  the  105  applicable  programs  28  required  inspection  to 
determine  the  results.  This  was  because  the  FORTRAN  intrinsic 
mathematical  functions  (SIN,  COS,  EXP,  etc.)  were  correctly  translated 
as  Ada  function  calls,  but  the  translated  Ada  code  needed  to  be  edited 
to  include  access  to  an  Ada  mathematical  library  package.  In 
addition,  one  test  was  modified  to  remove  an  optional  part  of  FORTRAN 
that  the  translator  does  not  support.  The  105  programs  contained  over 
15,000  lines  of  FORTRAN  source  and  thoroughly  exercised  the  capability 
of  the  translator  to  recognize  and  correctly  translate  FORTRAN  syntax. 
The  translator  passed  these  tests  (see  Appendix  C) . 


5.2.3  Coverage  by  Test  Suites 


The  non-applicability  of  126  of  the  319  COBOL  tests  and  88  of  the 
193  FORTRAN  tests  should  not  be  viewed  as  a  weakening  of  this  testing 
effort  The  GSA  suites  are  designed  to  be  tailored  to  particular 
applications  and  contain  repetitive  code  as  well  as  code  for  features 
that  the  translator  was  not  contracted  to  process. 


5 . 3  Final  Testing 


WWMCCS  ADP  software  was  used  for  the  final  acceptance  testing  of 
the  tools.  The  software,  using  random  data  generated  with  automated 
tools  or  live,  declassified  data,  was  executed  on  the  H6000  system. 
The  results  of  this  execution  were  captured  in  a  file.  The  system  was 
then  translated  into  Ada,  compiled  and  executed  with  the  same  data  set 
and  the  results  were  compared  with  the  original  results.  The 
translated  version  was  required  to  be  functionally  identical  in  all 
respects. 

Code  from  JOPS  III  (COBOL)  and  RapidSim  (FORTRAN),  plus 
additional  COBOL  and  FORTRAN  modules  of  WWMCCS  code  were  run  through 
the  translator.  The  tool  passed  these  tests  (see  Appendix  D) . 

In  total  (GSA  suites  +  WWMCCS  code),  approximately  110,000  lines 
of  COBOL  and  FORTRAN  source  code  was  used  in  testing  the  translator. 


6.0  Conclusion 


The  modernization  of  WWMCCS  ADP  software  into  WIS  through 
redesign  and  reengineering  is  underway  and  will  eventually  he 
completed.  In  the  interim,  some  functional  capabilities  of  WWMCCS  ADP 
can  he  transitioned  to  WIS  more  rapidly  through  the  use  of  source  to 
source  translation.  In  effect,  the  old  code  is  reused  as  portable, 
machine  independent  Ada  modules  thus  reducing  the  time  to  bring  an 
integrated,  functioning  WIS  on-line  while  defering  the  costs  for  the 
complete  redesign  and  implementation.  In  addition,  Ada,  which  is  a 
DoD  mandated  language  for  mission  critical  systems,  is  not  only 
expeditiously  utilized,  but  is  promoted  for  further  use  in  software 
engineering  throughout  DoD  and  industry. 

The  WIS  Ada  Translation  tool,  produced  for  the  WIS  JPMO  will 
successfully  translate  COBOL  and  FORTRAN  source  code  if  used  properly. 
The  information  in  the  user's  guide  provided  with  the  tool  must  be 
followed  to  the  letter,  otherwise  the  tool  will  "hang  up"  in 
execution,  or  will  not  produce  a  translation  at  all.  While  following 
the  rules  may  involve  some  changes  to  the  original  source,  merging  of 
certain  files,  and  modification  of  I/O  interfaces  (all  of  which  can  be 
time  consuming  and  potentially  frustrating),  the  alternative  of 
completely  re-writing  the  source  in  Ada  would  take  considerably  more 
time . 


The  execution  of  the  translator  is  slow.  On  a  VAX  8600  with  a 
small  load  and  plenty  of  available  resources,  the  tool  will  take  up  to 
one  hour  of  CPU  time  (and  over  one  hour  real  time)  to  translate  1500 
lines  of  complex  code. 

Finally,  the  translator  does  not  provide  (nor  was  it  intended  to 
provide)  a  fully  automatic,  turn-key,  "black  box"  for  translating 
code.  It  does  however,  provide  100%  automatic  translation  of  the 
correct  and  legal  features  of  COBOL  and  FORTRAN  as  specified  and 
contracted  for.  The  best  word  to  remember  when  using  the  translator 
is  patience. 
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APPENDIX  A 


* 


Translator  Prototypes  Delivery  Schedule* 


Deliver? ble 


Date 


Language 


Prototype 

1 

Scheduled 

April 

12. 

1985 

FORTRAN 

Actual 

April 

12. 

1985 

Prototype 

2 

Scheduled 

July 

12. 

1985 

FORTRAN 

Actual 

July 

12, 

1955 

Prototype 

3 

Scheduled 

Sept 

13. 

1985 

COBOL 

Actual 

Sept 

13. 

1985 

Prototype 

4 

Scheduled 

Oct 

14. 

1985 

FORTRAN 

Actual 

Oct 

17. 

1985 

Prototype 

5 

Scheduled 

Dec 

13. 

1985 

COBOL 

Actual 

Jan 

20, 

1986 

Prototype 

6 

Scheduled 

Jan 

14. 

1986 

FORTRAN 

Actual 

Jan 

20. 

1986 

Prototype 

7 

Scheduled 

March 

14, 

1986 

COBOL 

Actual 

April 

21. 

1986 

Prototype 

8 

Scheduled 

April 

14. 

1986 

FORTRAN 

Actual 

April 

21. 

1986 

Prototype 

9 

Scheduled 

June 

13. 

1986 

COBOL 

Actual 

July 

30. 

1986 

Prototype 

10 

Scheduled 

July 

14. 

1986 

FORTRAN 

Actual 

Nov 

17. 

1986 

Prototype 

11 

Scheduled 

Sept 

14, 

1986 

COBOL 

Actual 

Oct 

15, 

1986 

*There  were  originally  10  prototypes  planned.  The  11th  prototype  was 
agreed  upon  to  provide  a  nearly  complete  COBOL  capability  as  close  to 
the  original  Prototype  9  completion  date  as  was  possible. 


A  move  was  made  from  a  Data  General  MV10000  system  to  a  VAX  8600 
system  in  January  1986.  This  resulted  in  a  one  month  overall  delay  in 
the  schedule. 
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APPENDIX  B 


COBOL  Suite  Testing 


P  -  PASSED,  F-FAILED,  PM  -  PASSED  WITH  MODIFICATION, 
NA  -  NOT  APPLICABLE 


TEST 


i  CM101 


l  CM 102 


l  CM103 


I  CM 104 


l  CM105 


l  CM201 


l  CM202 


I  CM431 


I  DB101-DB105 
I  DB201-DB205 
I  DB421-DB422 


I  IC101 


I  IC102 


I  IC103 


I  IC104 


I  IC105 


I  IC106 


I  IC107 


I  IC108 


I  IC109 


i  IC110 


I  IC111 


I  IC219 


l  IC220 


f  IC421 


i  IC422 


l  IC431 


l  IC432 


l  IX101-IX107 
l  1X20 1-1X2 15 
I  1X44 1-1X442 


i  LB101-LB107 
l  LB201-LB207 
I  LB421+LB442 


I  NC101 


l  NC102 


l  NC103 


l  NC104 


l  NC105 


l  NC106 


l  NCI 07 


I  NC108 


l  NC109 


I  NCI 10 


I  NC111 


l  NCI 12 


l  NCI 13 


I  NCI 14 


l  NC115 


l  NCI 16 


l  NCI 17 


SG201-SG202 


Features  not  supported 


***  M  f?!.}  ; 


>  V 


) 


I 

I 

i 


I  SG204 


l  SG421 


l  SG431 


l  SQ101 


l  SQ102 


l  SQ103 


l  SQ104 


l  SQ105 


l  SQ106 


l  SQ107 


l  SQ108 


l  SQ109-SQ111 


l  SQ112 


l  SQ113 


i  SQ114-SQ121 , 
I  SQ151-SQ153 , 
I  SQ201-SQ202 


I  SQ203 


I  SQ204-SQ216 


I  SQ217 


I  SQ218 


l  SQ219 


i  SQ431 


I  SQ432 


I  ST101 


i  ST102 


i  ST103 


i  ST  104 


NA 


NA 


NA 


P 


P 


P 


P 


P 


P 


P 


P 


NA 


P 


P 


Features  not  supported 


Features  not  supported 


Features  not  supported 


Features  not  supported 


i 


NA 


Features  not  supported 


P 


NA  i  Features  not  supported 


P 


NA  i  Features  not  supported 


P 


P 


P 


P 


P 


P 


P 
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ST105 


ST  106 
ST107 
ST108 
ST109 
ST110 
ST111 
ST112 
ST113 
ST114 
ST115 
ST116 
ST117 
ST118 
ST201 
ST202 
ST203 
ST204 

ST205-ST206 

ST207 

ST208 

ST209 

ST210 

ST211 

ST212 

ST213 

ST214 


*l”  **  f  I* 


i) 

V  *  < 

1  v  v. 


Total  Tests 


Passed 


Passed  with  Modification 
Failed 

Not  Applicable 


APPENDIX  C 


FORTRAN  Suite  Testing 


P  -  PASSED,  F  -  FAILED,  PI  -  PASSED  BY  INSPECTION, 
PM  -  PASSED  WITH  MODIFICATION,  NA  -  NOT  APPLICABLE 


TEST 


RESULT 


COMMENTS 


FM022 


FM023 

FH024 

FM025 

FM026 

FM028 

FM030 

FM031 

FM032 

FM033 

FM034 

FM035 

FM036 

FMQ37 

FM038 

FM039 

FM040 

FM041 

FM042 

FM043 

FM044 

FM045 

FM050 

FH056 

FM060 

FH081 

FM062 


FM080 


1 

FH09? 

l 

PI 

i  Need  Ada  math  package  for  intrinsic 

fens 

1 

FM098 

1 

PI 

i  Need  Ada  math  package  for  intrinsic 

fens 

>  1 

FM099 

1 

PI 

i  Need  Ada  math  package  for  intrinsic 

fens 

1 

FM100 

1 

P 

i 

1 

FM101 

l 

P 

i 

» 

FM102 

l 

P 

i 

1 

FM103 

l 

P 

i 

1 

FK104 

l 

P 

i 

» 

FM105 

l 

P 

i 

1 

FM106 

1 

P 

i 

1 

FM107 

l 

P 

i 

• 

FM108 

l 

P 

1 

FH109 

l 

P 

i 

1 

FM110 

l 

P 

i 

m 

FM111 

l 

P 

( 

i 

FM200- 

FM201 

l 

NA 

i  Features  not  supported 

i 

FM202 

l 

P 

i 

m 

FM203 

l 

NA 

i  Features  not  supported 

i 

FM204 

l 

PI 

i  Need  Ada  package  for  intrinsic  chr 

function 

i 

FM205 

l 

NA 

i  Features  not  supported 

• 

FM250 

l 

NA 

i  Features  not  supported 

i 

FM252 

l 

PM 

i  Optional  comma  test  removed 

i 

FM253- 

FM261 

l 

NA 

i  Features  not  supported 

FM300 

l 

P 

i 

i 

FM301 

l 

P 

i 

i 

FM302 

l 

P 

i 
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FM353-FM357 , 
FM359-FM364 , 
FM368-FM379 


FM401 


FM402 


FM403 


FM404 


FM405 


FM406 


FM407 


FM411 


FM413 

FM503 

FM509 

FM517 

FM700 

FM710 

FM715 

FM719 

FM800 

FM900 

FM903 

FM906 

FM912 

FM915 


,  FM500 , 
,  FM506, 
,  FM514 , 
,  FM520 , 
,  FM701 , 
,  FM711 , 
,  FM718 , 
,  FM722 , 
-FM834 , 

,  FM901 , 
,  FM905 , 
-FM910 , 

,  FM914 , 
-FM923 


Features  not  supported 


Total  Tests 


193 


Passed  76 

Passed  by  Inspection  28 

>  Passed  with.  Modification  1 
Failed  0 

Not  Applicable  88 

) 


» 


ft 


# 


9 


e 


i 

i 
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Appendix  D 
WWMCCS  Code  Testing 


JOPS  III  Modules  Tested  (COBOL) 


P10E 


P 11 

PHD 

F11E 

FI  IF 

FUG 

PUT 

F11W 

F11X 

F12A 

F12B 

F12B1 

F12C 

F12D 

F12E 

F12E1 

F12G 

F12H 

F12K 

F12KK 

F12L 

F12M 

F12P 

F12R 

F12S 

P12T 

F12W 


F12X 

1 

P 

1 

F12Y 

l 

P 

1 

P14 

1 

P 

1 

F14A 

1 

P 

l 

F14G 

l 

P 

1 

F14J 

l 

P 

l 

F14M 

l 

P 

1 

F14R 

l 

P 

l 

F14S 

l 

P 

l 

F15 

l 

P  • 

l 

F15A 

i 

P 

l 

F15B 

l 

P 

l 

F20 

l 

P 

l 

F21 

l 

P 

l 

F21A 

l 

P 

l 

F21B 

l 

P 

i 

F22 

l 

P 

l 

F23 

l 

P 

l 

F23A 

l 

P 

i 

F23B 

l 

P 

i 

F24 

i 

P 

l 

F24A 

l 

P 

1 

F24B 

l 

P 

l 

F25 

l 

P 

l 

F26 

l 

P 

l 

F26A 

l 

P 

l 

F30 

l 

P 

1 

24 


P40 


• 

1 

F40A 

1 

P40D 

1 

F40E 

• 

1 

F50 

1 

F53 

1 

F60 

• 

1 

F60A 

1 

F60B 

1 

F60C 

• 

1 

F60D 

1 

F60P 

1 

F61 

• 

l 

F61A 

1 

F61C 

1 

F61D 

• 

1 

F61F 

1 

F61H 

1 

F70 

• 

1 

F71 

1 

1 

F71A 

1 

1 

F72 

1# 

1 

F80 

f 


GEORPT 


Using  the  COBOL  translator  on  WWMCCS  code  required  preparatory 
modifications  on  every  file.  All  references  to  data  files  other  than 
flat,  sequential  ASCII  files  were  removed.  Any  GMAP  code,  calls  to 
equipment  through  non-standard  COBOL  interfaces ,  etc .  were  also 
removed.  The  translated  neutered  code  performed  identically  to  the 
neutered  untranslated  code.  The  use  of  the  COBOL  translator  for  real 
WWMCCS  code  will  be  restrictive  because  of  these  modification  needs. 
However,  if  follow-on  extensions  to  the  translator  are  funded  and 
completed,  database  access,  GMAP  interaction,  etc.  will  be  less  of  a 
problem . 


RapidSim  System  (FORTRAN) 


P  -  PASSED,  F  -  FAILED 

TEST  RESULT 

l  AIRDST . FOR  I  P 


ARANDM . FOR  !  P 


• 

1 

ARRIVE. FOR 

l 

P 

l 

1 

ASGCGO . FOR 

l 

P 

l 

1 

ATHOLD . FOR 

l 

P 

l 

• 

1 

ATPOOL . FOR 

l 

P 

l 

1 

BEGIN. FOR 

l 

P 

l 

1 

CALCRT . FOR 

l 

P 

l 

• 

1 

CARDEV . FOR 

l 

P 

1 

1 

CARTR . FOR 

l 

P 

l 

1 

CENTER . FOR 

l 

P 

l 

• 

1 

CLKADJ . FOR 

l 

P 

l 

1 

CNVRT . FOR 

1 

P 

1 

1 

CNVYGO . FOR 

i 

P 

l 

• 

1 

CONRPT . FOR 

l 

P 

l 

1 

CONTRL . FOR 

l 

P 

l 

t 

CONVRT . FOR 

l 

P 

l 

• 

1 

DATIME . FOR 

l 

P 

l 

1 

DELAY . FOR 

i 

P 

l 

1 

DEPART . FOR 

l 

P 

l 

c 

1 

DISTRB . FOR 

l 

P 

l 

1 

ERROR 1. FOR 

l 

P 

l 

COMMENTS 


ERRORS . FOR 


i 


i 

i 


! 

i 


I 

j 


i 


l  EVTGEN . FOR 
I  EVTRPT . FOR 
i  FILDEF . FOR 
I  FINDTS . FOR 
I  GAUSS. FOR 
I  HEAD. FOR 
l  HEAD1 . FOR 
i  INPROC . FOR 
l  INTER. FOR 
I  INTMOG . FOR 
I  LEADER. FOR 
l  LISP. FOR 
l  LNKDST . FOR 
i  LSTPRT . FOR 
I  MODNOD . FOR 
I  MOMEN . FOR 
i  MUSTGO . FOR 
I  NAMES. FOR 
l  NETEVT . FOR 
l  NETIN . FOR 
I  NEWCHK . FOR 
i  NEXJOB , FOR 
I  NEXPOD . FOR 
I  NORPO . FOR 
I  N SHIFT. FOR 


I  NSREPT . FOR 


NTVEXT . FOR 


OEVENT . FOR 


PAGHED . FOR 
PUTOUT . FOR 
RANDM . FOR 
RATER . FOR 


REEDIN . FOR 
REROUT . FOR 
RESADJ . FOR 
RESAVL.FOR 


RPT1 . FOR 


RTRPT . FOR 
SEGACT . FOR 
SEGASG . FOR 
SEGLIM . FOR 
SELECT . FOR 


SETDIS . FOR 


I  SEVENT . FOR  i  P 

I  SHPRPRT . FOR  i  P 

l  SITAP1 . FOR  I  P 

l  SITAP1 . FOR  I  P 

l  SITAP2 . FOR  I  P 

i  SITAP3 . FOR  i  P 

l  SLDMOG . FOR  l  P 

i  SPILL. FOR  l  P 

l  STAGE. FOR  i  P 

l  SUPER. FOR  I  P 

l  TASKER. FOR  I  P 

i  TDISF . FOR  I  P 

I  UEVENT . FOR  I  P 

i  UTRACE3 . FOR  I  P 

I  WRAPUP . FOR  I  P 

I  WRITEM . FOR  l  P 

I  WRTSHP . FOR  l  P 

i  ZCKMOG . FOR  I  P 


The  FORTRAN  translator  requires  that  every  file  presented  to  it  be  a 
complete  program,  i.e.  a  subprogram  or  several  subprograms  in  a 
single  file  must  be  accompanied  by  a  main  program  in  that  same  file. 
There  are  two  ways  to  approach  this  problem.  The  first  is  to  include 
the  entire  system  all  in  one  file.  This  is  neither  feasible  nor  wise. 
Too  many  resources,  (CPU  time  most  notably)  would  be  needed.  The 
second  way  is  to  give  the  subprograms  "dummy"  main  programs.  These 
programs  are  then  translated  into  Ada.  The  Ada  files  are  edited  to 
make  the  dummy  main  programs  into  packages  containing  the  subprograms . 
References  can  the  be  made  to  the  compiled  routines  within  the 
packages  as  if  they  were  FORTRAN  library  subprograms.  This  is  the 
recommended  approach. 
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